home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 24 / AACD 24.iso / AACD / Programming / gcc-2.95.3-3 / info / g77.info-7 < prev    next >
Encoding:
GNU Info File  |  2001-07-15  |  50.0 KB  |  1,817 lines
  1. This is Info file f/g77.info, produced by Makeinfo version 1.68 from
  2. the input file ./f/g77.texi.
  3.  
  4. INFO-DIR-SECTION Programming
  5. START-INFO-DIR-ENTRY
  6. * g77: (g77).                  The GNU Fortran compiler.
  7. END-INFO-DIR-ENTRY
  8.    This file documents the use and the internals of the GNU Fortran
  9. (`g77') compiler.  It corresponds to the GCC-2.95 version of `g77'.
  10.  
  11.    Published by the Free Software Foundation 59 Temple Place - Suite 330
  12. Boston, MA 02111-1307 USA
  13.  
  14.    Copyright (C) 1995-1999 Free Software Foundation, Inc.
  15.  
  16.    Permission is granted to make and distribute verbatim copies of this
  17. manual provided the copyright notice and this permission notice are
  18. preserved on all copies.
  19.  
  20.    Permission is granted to copy and distribute modified versions of
  21. this manual under the conditions for verbatim copying, provided also
  22. that the sections entitled "GNU General Public License," "Funding for
  23. Free Software," and "Protect Your Freedom--Fight `Look And Feel'" are
  24. included exactly as in the original, and provided that the entire
  25. resulting derived work is distributed under the terms of a permission
  26. notice identical to this one.
  27.  
  28.    Permission is granted to copy and distribute translations of this
  29. manual into another language, under the above conditions for modified
  30. versions, except that the sections entitled "GNU General Public
  31. License," "Funding for Free Software," and "Protect Your Freedom--Fight
  32. `Look And Feel'", and this permission notice, may be included in
  33. translations approved by the Free Software Foundation instead of in the
  34. original English.
  35.  
  36.    Contributed by James Craig Burley (<craig@jcb-sc.com>).  Inspired by
  37. a first pass at translating `g77-0.5.16/f/DOC' that was contributed to
  38. Craig by David Ronis (<ronis@onsager.chem.mcgill.ca>).
  39.  
  40. 
  41. File: g77.info,  Node: MIL-STD 1753,  Next: f77/f2c Intrinsics,  Prev: CMPLX() of DOUBLE PRECISION,  Up: Functions and Subroutines
  42.  
  43. MIL-STD 1753 Support
  44. --------------------
  45.  
  46.    The GNU Fortran language includes the MIL-STD 1753 intrinsics
  47. `BTEST', `IAND', `IBCLR', `IBITS', `IBSET', `IEOR', `IOR', `ISHFT',
  48. `ISHFTC', `MVBITS', and `NOT'.
  49.  
  50. 
  51. File: g77.info,  Node: f77/f2c Intrinsics,  Next: Table of Intrinsic Functions,  Prev: MIL-STD 1753,  Up: Functions and Subroutines
  52.  
  53. `f77'/`f2c' Intrinsics
  54. ----------------------
  55.  
  56.    The bit-manipulation intrinsics supported by traditional `f77' and
  57. by `f2c' are available in the GNU Fortran language.  These include
  58. `AND', `LSHIFT', `OR', `RSHIFT', and `XOR'.
  59.  
  60.    Also supported are the intrinsics `CDABS', `CDCOS', `CDEXP',
  61. `CDLOG', `CDSIN', `CDSQRT', `DCMPLX', `DCONJG', `DFLOAT', `DIMAG',
  62. `DREAL', and `IMAG', `ZABS', `ZCOS', `ZEXP', `ZLOG', `ZSIN', and
  63. `ZSQRT'.
  64.  
  65. 
  66. File: g77.info,  Node: Table of Intrinsic Functions,  Prev: f77/f2c Intrinsics,  Up: Functions and Subroutines
  67.  
  68. Table of Intrinsic Functions
  69. ----------------------------
  70.  
  71.    (Corresponds to Section 15.10 of ANSI X3.9-1978 FORTRAN 77.)
  72.  
  73.    The GNU Fortran language adds various functions, subroutines, types,
  74. and arguments to the set of intrinsic functions in ANSI FORTRAN 77.
  75. The complete set of intrinsics supported by the GNU Fortran language is
  76. described below.
  77.  
  78.    Note that a name is not treated as that of an intrinsic if it is
  79. specified in an `EXTERNAL' statement in the same program unit; if a
  80. command-line option is used to disable the groups to which the
  81. intrinsic belongs; or if the intrinsic is not named in an `INTRINSIC'
  82. statement and a command-line option is used to hide the groups to which
  83. the intrinsic belongs.
  84.  
  85.    So, it is recommended that any reference in a program unit to an
  86. intrinsic procedure that is not a standard FORTRAN 77 intrinsic be
  87. accompanied by an appropriate `INTRINSIC' statement in that program
  88. unit.  This sort of defensive programming makes it more likely that an
  89. implementation will issue a diagnostic rather than generate incorrect
  90. code for such a reference.
  91.  
  92.    The terminology used below is based on that of the Fortran 90
  93. standard, so that the text may be more concise and accurate:
  94.  
  95.    * `OPTIONAL' means the argument may be omitted.
  96.  
  97.    * `A-1, A-2, ..., A-n' means more than one argument (generally named
  98.      `A') may be specified.
  99.  
  100.    * `scalar' means the argument must not be an array (must be a
  101.      variable or array element, or perhaps a constant if expressions
  102.      are permitted).
  103.  
  104.    * `DIMENSION(4)' means the argument must be an array having 4
  105.      elements.
  106.  
  107.    * `INTENT(IN)' means the argument must be an expression (such as a
  108.      constant or a variable that is defined upon invocation of the
  109.      intrinsic).
  110.  
  111.    * `INTENT(OUT)' means the argument must be definable by the
  112.      invocation of the intrinsic (that is, must not be a constant nor
  113.      an expression involving operators other than array reference and
  114.      substring reference).
  115.  
  116.    * `INTENT(INOUT)' means the argument must be defined prior to, and
  117.      definable by, invocation of the intrinsic (a combination of the
  118.      requirements of `INTENT(IN)' and `INTENT(OUT)'.
  119.  
  120.    * *Note Kind Notation::, for an explanation of `KIND'.
  121.  
  122.    (Note that the empty lines appearing in the menu below are not
  123. intentional--they result from a bug in the GNU `makeinfo' program...a
  124. program that, if it did not exist, would leave this document in far
  125. worse shape!)
  126.  
  127. * Menu:
  128.  
  129.  
  130. * Abort Intrinsic::     Abort the program.
  131.  
  132. * Abs Intrinsic::       Absolute value.
  133.  
  134. * Access Intrinsic::    Check file accessibility.
  135.  
  136. * AChar Intrinsic::     ASCII character from code.
  137.  
  138. * ACos Intrinsic::      Arc cosine.
  139.  
  140. * AdjustL Intrinsic::   (Reserved for future use.)
  141. * AdjustR Intrinsic::   (Reserved for future use.)
  142.  
  143. * AImag Intrinsic::     Convert/extract imaginary part of complex.
  144.  
  145. * AInt Intrinsic::      Truncate to whole number.
  146.  
  147. * Alarm Intrinsic::     Execute a routine after a given delay.
  148.  
  149. * All Intrinsic::       (Reserved for future use.)
  150. * Allocated Intrinsic:: (Reserved for future use.)
  151.  
  152. * ALog Intrinsic::      Natural logarithm (archaic).
  153. * ALog10 Intrinsic::    Common logarithm (archaic).
  154. * AMax0 Intrinsic::     Maximum value (archaic).
  155. * AMax1 Intrinsic::     Maximum value (archaic).
  156. * AMin0 Intrinsic::     Minimum value (archaic).
  157. * AMin1 Intrinsic::     Minimum value (archaic).
  158. * AMod Intrinsic::      Remainder (archaic).
  159.  
  160. * And Intrinsic::       Boolean AND.
  161.  
  162. * ANInt Intrinsic::     Round to nearest whole number.
  163.  
  164. * Any Intrinsic::       (Reserved for future use.)
  165.  
  166. * ASin Intrinsic::      Arc sine.
  167.  
  168. * Associated Intrinsic:: (Reserved for future use.)
  169.  
  170. * ATan Intrinsic::      Arc tangent.
  171. * ATan2 Intrinsic::     Arc tangent.
  172.  
  173. * BesJ0 Intrinsic::     Bessel function.
  174. * BesJ1 Intrinsic::     Bessel function.
  175. * BesJN Intrinsic::     Bessel function.
  176. * BesY0 Intrinsic::     Bessel function.
  177. * BesY1 Intrinsic::     Bessel function.
  178. * BesYN Intrinsic::     Bessel function.
  179.  
  180. * Bit_Size Intrinsic::  Number of bits in argument's type.
  181.  
  182. * BTest Intrinsic::     Test bit.
  183.  
  184. * CAbs Intrinsic::      Absolute value (archaic).
  185. * CCos Intrinsic::      Cosine (archaic).
  186.  
  187. * Ceiling Intrinsic::   (Reserved for future use.)
  188.  
  189. * CExp Intrinsic::      Exponential (archaic).
  190. * Char Intrinsic::      Character from code.
  191.  
  192. * ChDir Intrinsic (subroutine):: Change directory.
  193.  
  194. * ChMod Intrinsic (subroutine):: Change file modes.
  195.  
  196. * CLog Intrinsic::      Natural logarithm (archaic).
  197. * Cmplx Intrinsic::     Construct `COMPLEX(KIND=1)' value.
  198.  
  199. * Complex Intrinsic::   Build complex value from real and
  200.                          imaginary parts.
  201.  
  202. * Conjg Intrinsic::     Complex conjugate.
  203. * Cos Intrinsic::       Cosine.
  204.  
  205. * CosH Intrinsic::      Hyperbolic cosine.
  206.  
  207. * Count Intrinsic::     (Reserved for future use.)
  208. * CPU_Time Intrinsic::  Get current CPU time.
  209. * CShift Intrinsic::    (Reserved for future use.)
  210.  
  211. * CSin Intrinsic::      Sine (archaic).
  212. * CSqRt Intrinsic::     Square root (archaic).
  213.  
  214. * CTime Intrinsic (subroutine):: Convert time to Day Mon dd hh:mm:ss yyyy.
  215. * CTime Intrinsic (function):: Convert time to Day Mon dd hh:mm:ss yyyy.
  216.  
  217. * DAbs Intrinsic::      Absolute value (archaic).
  218. * DACos Intrinsic::     Arc cosine (archaic).
  219.  
  220. * DASin Intrinsic::     Arc sine (archaic).
  221.  
  222. * DATan Intrinsic::     Arc tangent (archaic).
  223. * DATan2 Intrinsic::    Arc tangent (archaic).
  224.  
  225. * Date_and_Time Intrinsic:: Get the current date and time.
  226.  
  227. * DbesJ0 Intrinsic::    Bessel function (archaic).
  228. * DbesJ1 Intrinsic::    Bessel function (archaic).
  229. * DbesJN Intrinsic::    Bessel function (archaic).
  230. * DbesY0 Intrinsic::    Bessel function (archaic).
  231. * DbesY1 Intrinsic::    Bessel function (archaic).
  232. * DbesYN Intrinsic::    Bessel function (archaic).
  233.  
  234. * Dble Intrinsic::      Convert to double precision.
  235.  
  236. * DCos Intrinsic::      Cosine (archaic).
  237.  
  238. * DCosH Intrinsic::     Hyperbolic cosine (archaic).
  239. * DDiM Intrinsic::      Difference magnitude (archaic).
  240.  
  241. * DErF Intrinsic::      Error function (archaic).
  242. * DErFC Intrinsic::     Complementary error function (archaic).
  243.  
  244. * DExp Intrinsic::      Exponential (archaic).
  245.  
  246. * Digits Intrinsic::    (Reserved for future use.)
  247.  
  248. * DiM Intrinsic::       Difference magnitude (non-negative subtract).
  249.  
  250. * DInt Intrinsic::      Truncate to whole number (archaic).
  251. * DLog Intrinsic::      Natural logarithm (archaic).
  252. * DLog10 Intrinsic::    Common logarithm (archaic).
  253. * DMax1 Intrinsic::     Maximum value (archaic).
  254. * DMin1 Intrinsic::     Minimum value (archaic).
  255. * DMod Intrinsic::      Remainder (archaic).
  256. * DNInt Intrinsic::     Round to nearest whole number (archaic).
  257.  
  258. * Dot_Product Intrinsic:: (Reserved for future use.)
  259.  
  260. * DProd Intrinsic::     Double-precision product.
  261.  
  262. * DSign Intrinsic::     Apply sign to magnitude (archaic).
  263. * DSin Intrinsic::      Sine (archaic).
  264.  
  265. * DSinH Intrinsic::     Hyperbolic sine (archaic).
  266. * DSqRt Intrinsic::     Square root (archaic).
  267. * DTan Intrinsic::      Tangent (archaic).
  268.  
  269. * DTanH Intrinsic::     Hyperbolic tangent (archaic).
  270.  
  271. * DTime Intrinsic (subroutine):: Get elapsed time since last time.
  272.  
  273. * EOShift Intrinsic::   (Reserved for future use.)
  274. * Epsilon Intrinsic::   (Reserved for future use.)
  275.  
  276. * ErF Intrinsic::       Error function.
  277. * ErFC Intrinsic::      Complementary error function.
  278. * ETime Intrinsic (subroutine):: Get elapsed time for process.
  279. * ETime Intrinsic (function):: Get elapsed time for process.
  280. * Exit Intrinsic::      Terminate the program.
  281.  
  282. * Exp Intrinsic::       Exponential.
  283.  
  284. * Exponent Intrinsic::  (Reserved for future use.)
  285.  
  286. * FDate Intrinsic (subroutine):: Get current time as Day Mon dd hh:mm:ss yyyy.
  287. * FDate Intrinsic (function):: Get current time as Day Mon dd hh:mm:ss yyyy.
  288. * FGet Intrinsic (subroutine):: Read a character from unit 5 stream-wise.
  289.  
  290. * FGetC Intrinsic (subroutine):: Read a character stream-wise.
  291.  
  292. * Float Intrinsic::     Conversion (archaic).
  293.  
  294. * Floor Intrinsic::     (Reserved for future use.)
  295.  
  296. * Flush Intrinsic::     Flush buffered output.
  297. * FNum Intrinsic::      Get file descriptor from Fortran unit number.
  298. * FPut Intrinsic (subroutine):: Write a character to unit 6 stream-wise.
  299.  
  300. * FPutC Intrinsic (subroutine):: Write a character stream-wise.
  301.  
  302. * Fraction Intrinsic::  (Reserved for future use.)
  303.  
  304. * FSeek Intrinsic::     Position file (low-level).
  305. * FStat Intrinsic (subroutine):: Get file information.
  306. * FStat Intrinsic (function):: Get file information.
  307. * FTell Intrinsic (subroutine):: Get file position (low-level).
  308. * FTell Intrinsic (function):: Get file position (low-level).
  309. * GError Intrinsic::    Get error message for last error.
  310. * GetArg Intrinsic::    Obtain command-line argument.
  311. * GetCWD Intrinsic (subroutine):: Get current working directory.
  312. * GetCWD Intrinsic (function):: Get current working directory.
  313. * GetEnv Intrinsic::    Get environment variable.
  314. * GetGId Intrinsic::    Get process group id.
  315. * GetLog Intrinsic::    Get login name.
  316. * GetPId Intrinsic::    Get process id.
  317. * GetUId Intrinsic::    Get process user id.
  318. * GMTime Intrinsic::    Convert time to GMT time info.
  319. * HostNm Intrinsic (subroutine):: Get host name.
  320. * HostNm Intrinsic (function):: Get host name.
  321.  
  322. * Huge Intrinsic::      (Reserved for future use.)
  323.  
  324. * IAbs Intrinsic::      Absolute value (archaic).
  325.  
  326. * IAChar Intrinsic::    ASCII code for character.
  327.  
  328. * IAnd Intrinsic::      Boolean AND.
  329.  
  330. * IArgC Intrinsic::     Obtain count of command-line arguments.
  331.  
  332. * IBClr Intrinsic::     Clear a bit.
  333. * IBits Intrinsic::     Extract a bit subfield of a variable.
  334. * IBSet Intrinsic::     Set a bit.
  335.  
  336. * IChar Intrinsic::     Code for character.
  337.  
  338. * IDate Intrinsic (UNIX):: Get local time info.
  339.  
  340. * IDiM Intrinsic::      Difference magnitude (archaic).
  341. * IDInt Intrinsic::     Convert to `INTEGER' value truncated
  342.                          to whole number (archaic).
  343. * IDNInt Intrinsic::    Convert to `INTEGER' value rounded
  344.                          to nearest whole number (archaic).
  345.  
  346. * IEOr Intrinsic::      Boolean XOR.
  347.  
  348. * IErrNo Intrinsic::    Get error number for last error.
  349.  
  350. * IFix Intrinsic::      Conversion (archaic).
  351.  
  352. * Imag Intrinsic::      Extract imaginary part of complex.
  353.  
  354. * ImagPart Intrinsic::  Extract imaginary part of complex.
  355.  
  356. * Index Intrinsic::     Locate a CHARACTER substring.
  357.  
  358. * Int Intrinsic::       Convert to `INTEGER' value truncated
  359.                          to whole number.
  360.  
  361. * Int2 Intrinsic::      Convert to `INTEGER(KIND=6)' value
  362.                          truncated to whole number.
  363. * Int8 Intrinsic::      Convert to `INTEGER(KIND=2)' value
  364.                          truncated to whole number.
  365.  
  366. * IOr Intrinsic::       Boolean OR.
  367.  
  368. * IRand Intrinsic::     Random number.
  369. * IsaTty Intrinsic::    Is unit connected to a terminal?
  370.  
  371. * IShft Intrinsic::     Logical bit shift.
  372. * IShftC Intrinsic::    Circular bit shift.
  373.  
  374. * ISign Intrinsic::     Apply sign to magnitude (archaic).
  375.  
  376. * ITime Intrinsic::     Get local time of day.
  377.  
  378. * Kill Intrinsic (subroutine):: Signal a process.
  379.  
  380. * Kind Intrinsic::      (Reserved for future use.)
  381. * LBound Intrinsic::    (Reserved for future use.)
  382.  
  383. * Len Intrinsic::       Length of character entity.
  384.  
  385. * Len_Trim Intrinsic::  Get last non-blank character in string.
  386.  
  387. * LGe Intrinsic::       Lexically greater than or equal.
  388. * LGt Intrinsic::       Lexically greater than.
  389.  
  390. * Link Intrinsic (subroutine):: Make hard link in file system.
  391.  
  392. * LLe Intrinsic::       Lexically less than or equal.
  393. * LLt Intrinsic::       Lexically less than.
  394.  
  395. * LnBlnk Intrinsic::    Get last non-blank character in string.
  396. * Loc Intrinsic::       Address of entity in core.
  397.  
  398. * Log Intrinsic::       Natural logarithm.
  399. * Log10 Intrinsic::     Common logarithm.
  400.  
  401. * Logical Intrinsic::   (Reserved for future use.)
  402.  
  403. * Long Intrinsic::      Conversion to `INTEGER(KIND=1)' (archaic).
  404.  
  405. * LShift Intrinsic::    Left-shift bits.
  406.  
  407. * LStat Intrinsic (subroutine):: Get file information.
  408. * LStat Intrinsic (function):: Get file information.
  409. * LTime Intrinsic::     Convert time to local time info.
  410.  
  411. * MatMul Intrinsic::    (Reserved for future use.)
  412.  
  413. * Max Intrinsic::       Maximum value.
  414. * Max0 Intrinsic::      Maximum value (archaic).
  415. * Max1 Intrinsic::      Maximum value (archaic).
  416.  
  417. * MaxExponent Intrinsic:: (Reserved for future use.)
  418. * MaxLoc Intrinsic::    (Reserved for future use.)
  419. * MaxVal Intrinsic::    (Reserved for future use.)
  420.  
  421. * MClock Intrinsic::    Get number of clock ticks for process.
  422. * MClock8 Intrinsic::   Get number of clock ticks for process.
  423.  
  424. * Merge Intrinsic::     (Reserved for future use.)
  425.  
  426. * Min Intrinsic::       Minimum value.
  427. * Min0 Intrinsic::      Minimum value (archaic).
  428. * Min1 Intrinsic::      Minimum value (archaic).
  429.  
  430. * MinExponent Intrinsic:: (Reserved for future use.)
  431. * MinLoc Intrinsic::    (Reserved for future use.)
  432. * MinVal Intrinsic::    (Reserved for future use.)
  433.  
  434. * Mod Intrinsic::       Remainder.
  435.  
  436. * Modulo Intrinsic::    (Reserved for future use.)
  437.  
  438. * MvBits Intrinsic::    Moving a bit field.
  439.  
  440. * Nearest Intrinsic::   (Reserved for future use.)
  441.  
  442. * NInt Intrinsic::      Convert to `INTEGER' value rounded
  443.                          to nearest whole number.
  444.  
  445. * Not Intrinsic::       Boolean NOT.
  446.  
  447. * Or Intrinsic::        Boolean OR.
  448.  
  449. * Pack Intrinsic::      (Reserved for future use.)
  450.  
  451. * PError Intrinsic::    Print error message for last error.
  452.  
  453. * Precision Intrinsic:: (Reserved for future use.)
  454. * Present Intrinsic::   (Reserved for future use.)
  455. * Product Intrinsic::   (Reserved for future use.)
  456.  
  457. * Radix Intrinsic::     (Reserved for future use.)
  458.  
  459. * Rand Intrinsic::      Random number.
  460.  
  461. * Random_Number Intrinsic:: (Reserved for future use.)
  462. * Random_Seed Intrinsic:: (Reserved for future use.)
  463. * Range Intrinsic::     (Reserved for future use.)
  464.  
  465. * Real Intrinsic::      Convert value to type `REAL(KIND=1)'.
  466.  
  467. * RealPart Intrinsic::  Extract real part of complex.
  468.  
  469. * Rename Intrinsic (subroutine):: Rename file.
  470.  
  471. * Repeat Intrinsic::    (Reserved for future use.)
  472. * Reshape Intrinsic::   (Reserved for future use.)
  473. * RRSpacing Intrinsic:: (Reserved for future use.)
  474.  
  475. * RShift Intrinsic::    Right-shift bits.
  476.  
  477. * Scale Intrinsic::     (Reserved for future use.)
  478. * Scan Intrinsic::      (Reserved for future use.)
  479.  
  480. * Second Intrinsic (function):: Get CPU time for process in seconds.
  481. * Second Intrinsic (subroutine):: Get CPU time for process
  482.                          in seconds.
  483.  
  484. * Selected_Int_Kind Intrinsic:: (Reserved for future use.)
  485. * Selected_Real_Kind Intrinsic:: (Reserved for future use.)
  486. * Set_Exponent Intrinsic:: (Reserved for future use.)
  487. * Shape Intrinsic::     (Reserved for future use.)
  488.  
  489. * Short Intrinsic::     Convert to `INTEGER(KIND=6)' value
  490.                          truncated to whole number.
  491.  
  492. * Sign Intrinsic::      Apply sign to magnitude.
  493.  
  494. * Signal Intrinsic (subroutine):: Muck with signal handling.
  495.  
  496. * Sin Intrinsic::       Sine.
  497.  
  498. * SinH Intrinsic::      Hyperbolic sine.
  499.  
  500. * Sleep Intrinsic::     Sleep for a specified time.
  501.  
  502. * Sngl Intrinsic::      Convert (archaic).
  503.  
  504. * Spacing Intrinsic::   (Reserved for future use.)
  505. * Spread Intrinsic::    (Reserved for future use.)
  506.  
  507. * SqRt Intrinsic::      Square root.
  508.  
  509. * SRand Intrinsic::     Random seed.
  510. * Stat Intrinsic (subroutine):: Get file information.
  511. * Stat Intrinsic (function):: Get file information.
  512.  
  513. * Sum Intrinsic::       (Reserved for future use.)
  514.  
  515. * SymLnk Intrinsic (subroutine):: Make symbolic link in file system.
  516.  
  517. * System Intrinsic (subroutine):: Invoke shell (system) command.
  518.  
  519. * System_Clock Intrinsic:: Get current system clock value.
  520.  
  521. * Tan Intrinsic::       Tangent.
  522.  
  523. * TanH Intrinsic::      Hyperbolic tangent.
  524.  
  525. * Time Intrinsic (UNIX):: Get current time as time value.
  526.  
  527. * Time8 Intrinsic::     Get current time as time value.
  528.  
  529. * Tiny Intrinsic::      (Reserved for future use.)
  530. * Transfer Intrinsic::  (Reserved for future use.)
  531. * Transpose Intrinsic:: (Reserved for future use.)
  532. * Trim Intrinsic::      (Reserved for future use.)
  533.  
  534. * TtyNam Intrinsic (subroutine):: Get name of terminal device for unit.
  535. * TtyNam Intrinsic (function):: Get name of terminal device for unit.
  536.  
  537. * UBound Intrinsic::    (Reserved for future use.)
  538.  
  539. * UMask Intrinsic (subroutine):: Set file creation permissions mask.
  540.  
  541. * Unlink Intrinsic (subroutine):: Unlink file.
  542.  
  543. * Unpack Intrinsic::    (Reserved for future use.)
  544. * Verify Intrinsic::    (Reserved for future use.)
  545.  
  546. * XOr Intrinsic::       Boolean XOR.
  547. * ZAbs Intrinsic::      Absolute value (archaic).
  548. * ZCos Intrinsic::      Cosine (archaic).
  549. * ZExp Intrinsic::      Exponential (archaic).
  550.  
  551. * ZLog Intrinsic::      Natural logarithm (archaic).
  552. * ZSin Intrinsic::      Sine (archaic).
  553. * ZSqRt Intrinsic::     Square root (archaic).
  554.  
  555. 
  556. File: g77.info,  Node: Abort Intrinsic,  Next: Abs Intrinsic,  Up: Table of Intrinsic Functions
  557.  
  558. Abort Intrinsic
  559. ...............
  560.  
  561.      CALL Abort()
  562.  
  563. Intrinsic groups: `unix'.
  564.  
  565. Description:
  566.  
  567.    Prints a message and potentially causes a core dump via `abort(3)'.
  568.  
  569. 
  570. File: g77.info,  Node: Abs Intrinsic,  Next: Access Intrinsic,  Prev: Abort Intrinsic,  Up: Table of Intrinsic Functions
  571.  
  572. Abs Intrinsic
  573. .............
  574.  
  575.      Abs(A)
  576.  
  577. Abs: `INTEGER' or `REAL' function.  The exact type depends on that of
  578. argument A--if A is `COMPLEX', this function's type is `REAL' with the
  579. same `KIND=' value as the type of A.  Otherwise, this function's type
  580. is the same as that of A.
  581.  
  582. A: `INTEGER', `REAL', or `COMPLEX'; scalar; INTENT(IN).
  583.  
  584. Intrinsic groups: (standard FORTRAN 77).
  585.  
  586. Description:
  587.  
  588.    Returns the absolute value of A.
  589.  
  590.    If A is type `COMPLEX', the absolute value is computed as:
  591.  
  592.      SQRT(REALPART(A)**2, IMAGPART(A)**2)
  593.  
  594. Otherwise, it is computed by negating the A if it is negative, or
  595. returning A.
  596.  
  597.    *Note Sign Intrinsic::, for how to explicitly compute the positive
  598. or negative form of the absolute value of an expression.
  599.  
  600. 
  601. File: g77.info,  Node: Access Intrinsic,  Next: AChar Intrinsic,  Prev: Abs Intrinsic,  Up: Table of Intrinsic Functions
  602.  
  603. Access Intrinsic
  604. ................
  605.  
  606.      Access(NAME, MODE)
  607.  
  608. Access: `INTEGER(KIND=1)' function.
  609.  
  610. NAME: `CHARACTER'; scalar; INTENT(IN).
  611.  
  612. MODE: `CHARACTER'; scalar; INTENT(IN).
  613.  
  614. Intrinsic groups: `unix'.
  615.  
  616. Description:
  617.  
  618.    Checks file NAME for accessibility in the mode specified by MODE and
  619. returns 0 if the file is accessible in that mode, otherwise an error
  620. code if the file is inaccessible or MODE is invalid.  See `access(2)'.
  621. A null character (`CHAR(0)') marks the end of the name in
  622. NAME--otherwise, trailing blanks in NAME are ignored.  MODE may be a
  623. concatenation of any of the following characters:
  624.  
  625. `r'
  626.      Read permission
  627.  
  628. `w'
  629.      Write permission
  630.  
  631. `x'
  632.      Execute permission
  633.  
  634. `SPC'
  635.      Existence
  636.  
  637. 
  638. File: g77.info,  Node: AChar Intrinsic,  Next: ACos Intrinsic,  Prev: Access Intrinsic,  Up: Table of Intrinsic Functions
  639.  
  640. AChar Intrinsic
  641. ...............
  642.  
  643.      AChar(I)
  644.  
  645. AChar: `CHARACTER*1' function.
  646.  
  647. I: `INTEGER'; scalar; INTENT(IN).
  648.  
  649. Intrinsic groups: `f2c', `f90'.
  650.  
  651. Description:
  652.  
  653.    Returns the ASCII character corresponding to the code specified by I.
  654.  
  655.    *Note IAChar Intrinsic::, for the inverse of this function.
  656.  
  657.    *Note Char Intrinsic::, for the function corresponding to the
  658. system's native character set.
  659.  
  660. 
  661. File: g77.info,  Node: ACos Intrinsic,  Next: AdjustL Intrinsic,  Prev: AChar Intrinsic,  Up: Table of Intrinsic Functions
  662.  
  663. ACos Intrinsic
  664. ..............
  665.  
  666.      ACos(X)
  667.  
  668. ACos: `REAL' function, the `KIND=' value of the type being that of
  669. argument X.
  670.  
  671. X: `REAL'; scalar; INTENT(IN).
  672.  
  673. Intrinsic groups: (standard FORTRAN 77).
  674.  
  675. Description:
  676.  
  677.    Returns the arc-cosine (inverse cosine) of X in radians.
  678.  
  679.    *Note Cos Intrinsic::, for the inverse of this function.
  680.  
  681. 
  682. File: g77.info,  Node: AdjustL Intrinsic,  Next: AdjustR Intrinsic,  Prev: ACos Intrinsic,  Up: Table of Intrinsic Functions
  683.  
  684. AdjustL Intrinsic
  685. .................
  686.  
  687.    This intrinsic is not yet implemented.  The name is, however,
  688. reserved as an intrinsic.  Use `EXTERNAL AdjustL' to use this name for
  689. an external procedure.
  690.  
  691. 
  692. File: g77.info,  Node: AdjustR Intrinsic,  Next: AImag Intrinsic,  Prev: AdjustL Intrinsic,  Up: Table of Intrinsic Functions
  693.  
  694. AdjustR Intrinsic
  695. .................
  696.  
  697.    This intrinsic is not yet implemented.  The name is, however,
  698. reserved as an intrinsic.  Use `EXTERNAL AdjustR' to use this name for
  699. an external procedure.
  700.  
  701. 
  702. File: g77.info,  Node: AImag Intrinsic,  Next: AInt Intrinsic,  Prev: AdjustR Intrinsic,  Up: Table of Intrinsic Functions
  703.  
  704. AImag Intrinsic
  705. ...............
  706.  
  707.      AImag(Z)
  708.  
  709. AImag: `REAL' function.  This intrinsic is valid when argument Z is
  710. `COMPLEX(KIND=1)'.  When Z is any other `COMPLEX' type, this intrinsic
  711. is valid only when used as the argument to `REAL()', as explained below.
  712.  
  713. Z: `COMPLEX'; scalar; INTENT(IN).
  714.  
  715. Intrinsic groups: (standard FORTRAN 77).
  716.  
  717. Description:
  718.  
  719.    Returns the (possibly converted) imaginary part of Z.
  720.  
  721.    Use of `AIMAG()' with an argument of a type other than
  722. `COMPLEX(KIND=1)' is restricted to the following case:
  723.  
  724.      REAL(AIMAG(Z))
  725.  
  726. This expression converts the imaginary part of Z to `REAL(KIND=1)'.
  727.  
  728.    *Note REAL() and AIMAG() of Complex::, for more information.
  729.  
  730. 
  731. File: g77.info,  Node: AInt Intrinsic,  Next: Alarm Intrinsic,  Prev: AImag Intrinsic,  Up: Table of Intrinsic Functions
  732.  
  733. AInt Intrinsic
  734. ..............
  735.  
  736.      AInt(A)
  737.  
  738. AInt: `REAL' function, the `KIND=' value of the type being that of
  739. argument A.
  740.  
  741. A: `REAL'; scalar; INTENT(IN).
  742.  
  743. Intrinsic groups: (standard FORTRAN 77).
  744.  
  745. Description:
  746.  
  747.    Returns A with the fractional portion of its magnitude truncated and
  748. its sign preserved.  (Also called "truncation towards zero".)
  749.  
  750.    *Note ANInt Intrinsic::, for how to round to nearest whole number.
  751.  
  752.    *Note Int Intrinsic::, for how to truncate and then convert number
  753. to `INTEGER'.
  754.  
  755. 
  756. File: g77.info,  Node: Alarm Intrinsic,  Next: All Intrinsic,  Prev: AInt Intrinsic,  Up: Table of Intrinsic Functions
  757.  
  758. Alarm Intrinsic
  759. ...............
  760.  
  761.      CALL Alarm(SECONDS, HANDLER, STATUS)
  762.  
  763. SECONDS: `INTEGER'; scalar; INTENT(IN).
  764.  
  765. HANDLER: Signal handler (`INTEGER FUNCTION' or `SUBROUTINE') or
  766. dummy/global `INTEGER(KIND=1)' scalar.
  767.  
  768. STATUS: `INTEGER(KIND=1)'; OPTIONAL; scalar; INTENT(OUT).
  769.  
  770. Intrinsic groups: `unix'.
  771.  
  772. Description:
  773.  
  774.    Causes external subroutine HANDLER to be executed after a delay of
  775. SECONDS seconds by using `alarm(1)' to set up a signal and `signal(2)'
  776. to catch it.  If STATUS is supplied, it will be returned with the
  777. number of seconds remaining until any previously scheduled alarm was
  778. due to be delivered, or zero if there was no previously scheduled alarm.
  779. *Note Signal Intrinsic (subroutine)::.
  780.  
  781. 
  782. File: g77.info,  Node: All Intrinsic,  Next: Allocated Intrinsic,  Prev: Alarm Intrinsic,  Up: Table of Intrinsic Functions
  783.  
  784. All Intrinsic
  785. .............
  786.  
  787.    This intrinsic is not yet implemented.  The name is, however,
  788. reserved as an intrinsic.  Use `EXTERNAL All' to use this name for an
  789. external procedure.
  790.  
  791. 
  792. File: g77.info,  Node: Allocated Intrinsic,  Next: ALog Intrinsic,  Prev: All Intrinsic,  Up: Table of Intrinsic Functions
  793.  
  794. Allocated Intrinsic
  795. ...................
  796.  
  797.    This intrinsic is not yet implemented.  The name is, however,
  798. reserved as an intrinsic.  Use `EXTERNAL Allocated' to use this name
  799. for an external procedure.
  800.  
  801. 
  802. File: g77.info,  Node: ALog Intrinsic,  Next: ALog10 Intrinsic,  Prev: Allocated Intrinsic,  Up: Table of Intrinsic Functions
  803.  
  804. ALog Intrinsic
  805. ..............
  806.  
  807.      ALog(X)
  808.  
  809. ALog: `REAL(KIND=1)' function.
  810.  
  811. X: `REAL(KIND=1)'; scalar; INTENT(IN).
  812.  
  813. Intrinsic groups: (standard FORTRAN 77).
  814.  
  815. Description:
  816.  
  817.    Archaic form of `LOG()' that is specific to one type for X.  *Note
  818. Log Intrinsic::.
  819.  
  820. 
  821. File: g77.info,  Node: ALog10 Intrinsic,  Next: AMax0 Intrinsic,  Prev: ALog Intrinsic,  Up: Table of Intrinsic Functions
  822.  
  823. ALog10 Intrinsic
  824. ................
  825.  
  826.      ALog10(X)
  827.  
  828. ALog10: `REAL(KIND=1)' function.
  829.  
  830. X: `REAL(KIND=1)'; scalar; INTENT(IN).
  831.  
  832. Intrinsic groups: (standard FORTRAN 77).
  833.  
  834. Description:
  835.  
  836.    Archaic form of `LOG10()' that is specific to one type for X.  *Note
  837. Log10 Intrinsic::.
  838.  
  839. 
  840. File: g77.info,  Node: AMax0 Intrinsic,  Next: AMax1 Intrinsic,  Prev: ALog10 Intrinsic,  Up: Table of Intrinsic Functions
  841.  
  842. AMax0 Intrinsic
  843. ...............
  844.  
  845.      AMax0(A-1, A-2, ..., A-n)
  846.  
  847. AMax0: `REAL(KIND=1)' function.
  848.  
  849. A: `INTEGER(KIND=1)'; at least two such arguments must be provided;
  850. scalar; INTENT(IN).
  851.  
  852. Intrinsic groups: (standard FORTRAN 77).
  853.  
  854. Description:
  855.  
  856.    Archaic form of `MAX()' that is specific to one type for A and a
  857. different return type.  *Note Max Intrinsic::.
  858.  
  859. 
  860. File: g77.info,  Node: AMax1 Intrinsic,  Next: AMin0 Intrinsic,  Prev: AMax0 Intrinsic,  Up: Table of Intrinsic Functions
  861.  
  862. AMax1 Intrinsic
  863. ...............
  864.  
  865.      AMax1(A-1, A-2, ..., A-n)
  866.  
  867. AMax1: `REAL(KIND=1)' function.
  868.  
  869. A: `REAL(KIND=1)'; at least two such arguments must be provided;
  870. scalar; INTENT(IN).
  871.  
  872. Intrinsic groups: (standard FORTRAN 77).
  873.  
  874. Description:
  875.  
  876.    Archaic form of `MAX()' that is specific to one type for A.  *Note
  877. Max Intrinsic::.
  878.  
  879. 
  880. File: g77.info,  Node: AMin0 Intrinsic,  Next: AMin1 Intrinsic,  Prev: AMax1 Intrinsic,  Up: Table of Intrinsic Functions
  881.  
  882. AMin0 Intrinsic
  883. ...............
  884.  
  885.      AMin0(A-1, A-2, ..., A-n)
  886.  
  887. AMin0: `REAL(KIND=1)' function.
  888.  
  889. A: `INTEGER(KIND=1)'; at least two such arguments must be provided;
  890. scalar; INTENT(IN).
  891.  
  892. Intrinsic groups: (standard FORTRAN 77).
  893.  
  894. Description:
  895.  
  896.    Archaic form of `MIN()' that is specific to one type for A and a
  897. different return type.  *Note Min Intrinsic::.
  898.  
  899. 
  900. File: g77.info,  Node: AMin1 Intrinsic,  Next: AMod Intrinsic,  Prev: AMin0 Intrinsic,  Up: Table of Intrinsic Functions
  901.  
  902. AMin1 Intrinsic
  903. ...............
  904.  
  905.      AMin1(A-1, A-2, ..., A-n)
  906.  
  907. AMin1: `REAL(KIND=1)' function.
  908.  
  909. A: `REAL(KIND=1)'; at least two such arguments must be provided;
  910. scalar; INTENT(IN).
  911.  
  912. Intrinsic groups: (standard FORTRAN 77).
  913.  
  914. Description:
  915.  
  916.    Archaic form of `MIN()' that is specific to one type for A.  *Note
  917. Min Intrinsic::.
  918.  
  919. 
  920. File: g77.info,  Node: AMod Intrinsic,  Next: And Intrinsic,  Prev: AMin1 Intrinsic,  Up: Table of Intrinsic Functions
  921.  
  922. AMod Intrinsic
  923. ..............
  924.  
  925.      AMod(A, P)
  926.  
  927. AMod: `REAL(KIND=1)' function.
  928.  
  929. A: `REAL(KIND=1)'; scalar; INTENT(IN).
  930.  
  931. P: `REAL(KIND=1)'; scalar; INTENT(IN).
  932.  
  933. Intrinsic groups: (standard FORTRAN 77).
  934.  
  935. Description:
  936.  
  937.    Archaic form of `MOD()' that is specific to one type for A.  *Note
  938. Mod Intrinsic::.
  939.  
  940. 
  941. File: g77.info,  Node: And Intrinsic,  Next: ANInt Intrinsic,  Prev: AMod Intrinsic,  Up: Table of Intrinsic Functions
  942.  
  943. And Intrinsic
  944. .............
  945.  
  946.      And(I, J)
  947.  
  948. And: `INTEGER' or `LOGICAL' function, the exact type being the result
  949. of cross-promoting the types of all the arguments.
  950.  
  951. I: `INTEGER' or `LOGICAL'; scalar; INTENT(IN).
  952.  
  953. J: `INTEGER' or `LOGICAL'; scalar; INTENT(IN).
  954.  
  955. Intrinsic groups: `f2c'.
  956.  
  957. Description:
  958.  
  959.    Returns value resulting from boolean AND of pair of bits in each of
  960. I and J.
  961.  
  962. 
  963. File: g77.info,  Node: ANInt Intrinsic,  Next: Any Intrinsic,  Prev: And Intrinsic,  Up: Table of Intrinsic Functions
  964.  
  965. ANInt Intrinsic
  966. ...............
  967.  
  968.      ANInt(A)
  969.  
  970. ANInt: `REAL' function, the `KIND=' value of the type being that of
  971. argument A.
  972.  
  973. A: `REAL'; scalar; INTENT(IN).
  974.  
  975. Intrinsic groups: (standard FORTRAN 77).
  976.  
  977. Description:
  978.  
  979.    Returns A with the fractional portion of its magnitude eliminated by
  980. rounding to the nearest whole number and with its sign preserved.
  981.  
  982.    A fractional portion exactly equal to `.5' is rounded to the whole
  983. number that is larger in magnitude.  (Also called "Fortran round".)
  984.  
  985.    *Note AInt Intrinsic::, for how to truncate to whole number.
  986.  
  987.    *Note NInt Intrinsic::, for how to round and then convert number to
  988. `INTEGER'.
  989.  
  990. 
  991. File: g77.info,  Node: Any Intrinsic,  Next: ASin Intrinsic,  Prev: ANInt Intrinsic,  Up: Table of Intrinsic Functions
  992.  
  993. Any Intrinsic
  994. .............
  995.  
  996.    This intrinsic is not yet implemented.  The name is, however,
  997. reserved as an intrinsic.  Use `EXTERNAL Any' to use this name for an
  998. external procedure.
  999.  
  1000. 
  1001. File: g77.info,  Node: ASin Intrinsic,  Next: Associated Intrinsic,  Prev: Any Intrinsic,  Up: Table of Intrinsic Functions
  1002.  
  1003. ASin Intrinsic
  1004. ..............
  1005.  
  1006.      ASin(X)
  1007.  
  1008. ASin: `REAL' function, the `KIND=' value of the type being that of
  1009. argument X.
  1010.  
  1011. X: `REAL'; scalar; INTENT(IN).
  1012.  
  1013. Intrinsic groups: (standard FORTRAN 77).
  1014.  
  1015. Description:
  1016.  
  1017.    Returns the arc-sine (inverse sine) of X in radians.
  1018.  
  1019.    *Note Sin Intrinsic::, for the inverse of this function.
  1020.  
  1021. 
  1022. File: g77.info,  Node: Associated Intrinsic,  Next: ATan Intrinsic,  Prev: ASin Intrinsic,  Up: Table of Intrinsic Functions
  1023.  
  1024. Associated Intrinsic
  1025. ....................
  1026.  
  1027.    This intrinsic is not yet implemented.  The name is, however,
  1028. reserved as an intrinsic.  Use `EXTERNAL Associated' to use this name
  1029. for an external procedure.
  1030.  
  1031. 
  1032. File: g77.info,  Node: ATan Intrinsic,  Next: ATan2 Intrinsic,  Prev: Associated Intrinsic,  Up: Table of Intrinsic Functions
  1033.  
  1034. ATan Intrinsic
  1035. ..............
  1036.  
  1037.      ATan(X)
  1038.  
  1039. ATan: `REAL' function, the `KIND=' value of the type being that of
  1040. argument X.
  1041.  
  1042. X: `REAL'; scalar; INTENT(IN).
  1043.  
  1044. Intrinsic groups: (standard FORTRAN 77).
  1045.  
  1046. Description:
  1047.  
  1048.    Returns the arc-tangent (inverse tangent) of X in radians.
  1049.  
  1050.    *Note Tan Intrinsic::, for the inverse of this function.
  1051.  
  1052. 
  1053. File: g77.info,  Node: ATan2 Intrinsic,  Next: BesJ0 Intrinsic,  Prev: ATan Intrinsic,  Up: Table of Intrinsic Functions
  1054.  
  1055. ATan2 Intrinsic
  1056. ...............
  1057.  
  1058.      ATan2(Y, X)
  1059.  
  1060. ATan2: `REAL' function, the exact type being the result of
  1061. cross-promoting the types of all the arguments.
  1062.  
  1063. Y: `REAL'; scalar; INTENT(IN).
  1064.  
  1065. X: `REAL'; scalar; INTENT(IN).
  1066.  
  1067. Intrinsic groups: (standard FORTRAN 77).
  1068.  
  1069. Description:
  1070.  
  1071.    Returns the arc-tangent (inverse tangent) of the complex number (Y,
  1072. X) in radians.
  1073.  
  1074.    *Note Tan Intrinsic::, for the inverse of this function.
  1075.  
  1076. 
  1077. File: g77.info,  Node: BesJ0 Intrinsic,  Next: BesJ1 Intrinsic,  Prev: ATan2 Intrinsic,  Up: Table of Intrinsic Functions
  1078.  
  1079. BesJ0 Intrinsic
  1080. ...............
  1081.  
  1082.      BesJ0(X)
  1083.  
  1084. BesJ0: `REAL' function, the `KIND=' value of the type being that of
  1085. argument X.
  1086.  
  1087. X: `REAL'; scalar; INTENT(IN).
  1088.  
  1089. Intrinsic groups: `unix'.
  1090.  
  1091. Description:
  1092.  
  1093.    Calculates the Bessel function of the first kind of order 0 of X.
  1094. See `bessel(3m)', on whose implementation the function depends.
  1095.  
  1096. 
  1097. File: g77.info,  Node: BesJ1 Intrinsic,  Next: BesJN Intrinsic,  Prev: BesJ0 Intrinsic,  Up: Table of Intrinsic Functions
  1098.  
  1099. BesJ1 Intrinsic
  1100. ...............
  1101.  
  1102.      BesJ1(X)
  1103.  
  1104. BesJ1: `REAL' function, the `KIND=' value of the type being that of
  1105. argument X.
  1106.  
  1107. X: `REAL'; scalar; INTENT(IN).
  1108.  
  1109. Intrinsic groups: `unix'.
  1110.  
  1111. Description:
  1112.  
  1113.    Calculates the Bessel function of the first kind of order 1 of X.
  1114. See `bessel(3m)', on whose implementation the function depends.
  1115.  
  1116. 
  1117. File: g77.info,  Node: BesJN Intrinsic,  Next: BesY0 Intrinsic,  Prev: BesJ1 Intrinsic,  Up: Table of Intrinsic Functions
  1118.  
  1119. BesJN Intrinsic
  1120. ...............
  1121.  
  1122.      BesJN(N, X)
  1123.  
  1124. BesJN: `REAL' function, the `KIND=' value of the type being that of
  1125. argument X.
  1126.  
  1127. N: `INTEGER'; scalar; INTENT(IN).
  1128.  
  1129. X: `REAL'; scalar; INTENT(IN).
  1130.  
  1131. Intrinsic groups: `unix'.
  1132.  
  1133. Description:
  1134.  
  1135.    Calculates the Bessel function of the first kind of order N of X.
  1136. See `bessel(3m)', on whose implementation the function depends.
  1137.  
  1138. 
  1139. File: g77.info,  Node: BesY0 Intrinsic,  Next: BesY1 Intrinsic,  Prev: BesJN Intrinsic,  Up: Table of Intrinsic Functions
  1140.  
  1141. BesY0 Intrinsic
  1142. ...............
  1143.  
  1144.      BesY0(X)
  1145.  
  1146. BesY0: `REAL' function, the `KIND=' value of the type being that of
  1147. argument X.
  1148.  
  1149. X: `REAL'; scalar; INTENT(IN).
  1150.  
  1151. Intrinsic groups: `unix'.
  1152.  
  1153. Description:
  1154.  
  1155.    Calculates the Bessel function of the second kind of order 0 of X.
  1156. See `bessel(3m)', on whose implementation the function depends.
  1157.  
  1158. 
  1159. File: g77.info,  Node: BesY1 Intrinsic,  Next: BesYN Intrinsic,  Prev: BesY0 Intrinsic,  Up: Table of Intrinsic Functions
  1160.  
  1161. BesY1 Intrinsic
  1162. ...............
  1163.  
  1164.      BesY1(X)
  1165.  
  1166. BesY1: `REAL' function, the `KIND=' value of the type being that of
  1167. argument X.
  1168.  
  1169. X: `REAL'; scalar; INTENT(IN).
  1170.  
  1171. Intrinsic groups: `unix'.
  1172.  
  1173. Description:
  1174.  
  1175.    Calculates the Bessel function of the second kind of order 1 of X.
  1176. See `bessel(3m)', on whose implementation the function depends.
  1177.  
  1178. 
  1179. File: g77.info,  Node: BesYN Intrinsic,  Next: Bit_Size Intrinsic,  Prev: BesY1 Intrinsic,  Up: Table of Intrinsic Functions
  1180.  
  1181. BesYN Intrinsic
  1182. ...............
  1183.  
  1184.      BesYN(N, X)
  1185.  
  1186. BesYN: `REAL' function, the `KIND=' value of the type being that of
  1187. argument X.
  1188.  
  1189. N: `INTEGER'; scalar; INTENT(IN).
  1190.  
  1191. X: `REAL'; scalar; INTENT(IN).
  1192.  
  1193. Intrinsic groups: `unix'.
  1194.  
  1195. Description:
  1196.  
  1197.    Calculates the Bessel function of the second kind of order N of X.
  1198. See `bessel(3m)', on whose implementation the function depends.
  1199.  
  1200. 
  1201. File: g77.info,  Node: Bit_Size Intrinsic,  Next: BTest Intrinsic,  Prev: BesYN Intrinsic,  Up: Table of Intrinsic Functions
  1202.  
  1203. Bit_Size Intrinsic
  1204. ..................
  1205.  
  1206.      Bit_Size(I)
  1207.  
  1208. Bit_Size: `INTEGER' function, the `KIND=' value of the type being that
  1209. of argument I.
  1210.  
  1211. I: `INTEGER'; scalar.
  1212.  
  1213. Intrinsic groups: `f90'.
  1214.  
  1215. Description:
  1216.  
  1217.    Returns the number of bits (integer precision plus sign bit)
  1218. represented by the type for I.
  1219.  
  1220.    *Note BTest Intrinsic::, for how to test the value of a bit in a
  1221. variable or array.
  1222.  
  1223.    *Note IBSet Intrinsic::, for how to set a bit in a variable to 1.
  1224.  
  1225.    *Note IBClr Intrinsic::, for how to set a bit in a variable to 0.
  1226.  
  1227. 
  1228. File: g77.info,  Node: BTest Intrinsic,  Next: CAbs Intrinsic,  Prev: Bit_Size Intrinsic,  Up: Table of Intrinsic Functions
  1229.  
  1230. BTest Intrinsic
  1231. ...............
  1232.  
  1233.      BTest(I, POS)
  1234.  
  1235. BTest: `LOGICAL(KIND=1)' function.
  1236.  
  1237. I: `INTEGER'; scalar; INTENT(IN).
  1238.  
  1239. POS: `INTEGER'; scalar; INTENT(IN).
  1240.  
  1241. Intrinsic groups: `mil', `f90', `vxt'.
  1242.  
  1243. Description:
  1244.  
  1245.    Returns `.TRUE.' if bit POS in I is 1, `.FALSE.' otherwise.
  1246.  
  1247.    (Bit 0 is the low-order (rightmost) bit, adding the value 2**0, or 1,
  1248. to the number if set to 1; bit 1 is the next-higher-order bit, adding
  1249. 2**1, or 2; bit 2 adds 2**2, or 4; and so on.)
  1250.  
  1251.    *Note Bit_Size Intrinsic::, for how to obtain the number of bits in
  1252. a type.  The leftmost bit of I is `BIT_SIZE(I-1)'.
  1253.  
  1254. 
  1255. File: g77.info,  Node: CAbs Intrinsic,  Next: CCos Intrinsic,  Prev: BTest Intrinsic,  Up: Table of Intrinsic Functions
  1256.  
  1257. CAbs Intrinsic
  1258. ..............
  1259.  
  1260.      CAbs(A)
  1261.  
  1262. CAbs: `REAL(KIND=1)' function.
  1263.  
  1264. A: `COMPLEX(KIND=1)'; scalar; INTENT(IN).
  1265.  
  1266. Intrinsic groups: (standard FORTRAN 77).
  1267.  
  1268. Description:
  1269.  
  1270.    Archaic form of `ABS()' that is specific to one type for A.  *Note
  1271. Abs Intrinsic::.
  1272.  
  1273. 
  1274. File: g77.info,  Node: CCos Intrinsic,  Next: Ceiling Intrinsic,  Prev: CAbs Intrinsic,  Up: Table of Intrinsic Functions
  1275.  
  1276. CCos Intrinsic
  1277. ..............
  1278.  
  1279.      CCos(X)
  1280.  
  1281. CCos: `COMPLEX(KIND=1)' function.
  1282.  
  1283. X: `COMPLEX(KIND=1)'; scalar; INTENT(IN).
  1284.  
  1285. Intrinsic groups: (standard FORTRAN 77).
  1286.  
  1287. Description:
  1288.  
  1289.    Archaic form of `COS()' that is specific to one type for X.  *Note
  1290. Cos Intrinsic::.
  1291.  
  1292. 
  1293. File: g77.info,  Node: Ceiling Intrinsic,  Next: CExp Intrinsic,  Prev: CCos Intrinsic,  Up: Table of Intrinsic Functions
  1294.  
  1295. Ceiling Intrinsic
  1296. .................
  1297.  
  1298.    This intrinsic is not yet implemented.  The name is, however,
  1299. reserved as an intrinsic.  Use `EXTERNAL Ceiling' to use this name for
  1300. an external procedure.
  1301.  
  1302. 
  1303. File: g77.info,  Node: CExp Intrinsic,  Next: Char Intrinsic,  Prev: Ceiling Intrinsic,  Up: Table of Intrinsic Functions
  1304.  
  1305. CExp Intrinsic
  1306. ..............
  1307.  
  1308.      CExp(X)
  1309.  
  1310. CExp: `COMPLEX(KIND=1)' function.
  1311.  
  1312. X: `COMPLEX(KIND=1)'; scalar; INTENT(IN).
  1313.  
  1314. Intrinsic groups: (standard FORTRAN 77).
  1315.  
  1316. Description:
  1317.  
  1318.    Archaic form of `EXP()' that is specific to one type for X.  *Note
  1319. Exp Intrinsic::.
  1320.  
  1321. 
  1322. File: g77.info,  Node: Char Intrinsic,  Next: ChDir Intrinsic (subroutine),  Prev: CExp Intrinsic,  Up: Table of Intrinsic Functions
  1323.  
  1324. Char Intrinsic
  1325. ..............
  1326.  
  1327.      Char(I)
  1328.  
  1329. Char: `CHARACTER*1' function.
  1330.  
  1331. I: `INTEGER'; scalar; INTENT(IN).
  1332.  
  1333. Intrinsic groups: (standard FORTRAN 77).
  1334.  
  1335. Description:
  1336.  
  1337.    Returns the character corresponding to the code specified by I,
  1338. using the system's native character set.
  1339.  
  1340.    Because the system's native character set is used, the
  1341. correspondence between character and their codes is not necessarily the
  1342. same between GNU Fortran implementations.
  1343.  
  1344.    Note that no intrinsic exists to convert a numerical value to a
  1345. printable character string.  For example, there is no intrinsic that,
  1346. given an `INTEGER' or `REAL' argument with the value `154', returns the
  1347. `CHARACTER' result `'154''.
  1348.  
  1349.    Instead, you can use internal-file I/O to do this kind of conversion.
  1350. For example:
  1351.  
  1352.      INTEGER VALUE
  1353.      CHARACTER*10 STRING
  1354.      VALUE = 154
  1355.      WRITE (STRING, '(I10)'), VALUE
  1356.      PRINT *, STRING
  1357.      END
  1358.  
  1359.    The above program, when run, prints:
  1360.  
  1361.              154
  1362.  
  1363.    *Note IChar Intrinsic::, for the inverse of the `CHAR' function.
  1364.  
  1365.    *Note AChar Intrinsic::, for the function corresponding to the ASCII
  1366. character set.
  1367.  
  1368. 
  1369. File: g77.info,  Node: ChDir Intrinsic (subroutine),  Next: ChMod Intrinsic (subroutine),  Prev: Char Intrinsic,  Up: Table of Intrinsic Functions
  1370.  
  1371. ChDir Intrinsic (subroutine)
  1372. ............................
  1373.  
  1374.      CALL ChDir(DIR, STATUS)
  1375.  
  1376. DIR: `CHARACTER'; scalar; INTENT(IN).
  1377.  
  1378. STATUS: `INTEGER(KIND=1)'; OPTIONAL; scalar; INTENT(OUT).
  1379.  
  1380. Intrinsic groups: `unix'.
  1381.  
  1382. Description:
  1383.  
  1384.    Sets the current working directory to be DIR.  If the STATUS
  1385. argument is supplied, it contains 0 on success or a non-zero error code
  1386. otherwise upon return.  See `chdir(3)'.
  1387.  
  1388.    *Caution:* Using this routine during I/O to a unit connected with a
  1389. non-absolute file name can cause subsequent I/O on such a unit to fail
  1390. because the I/O library might reopen files by name.
  1391.  
  1392.    Some non-GNU implementations of Fortran provide this intrinsic as
  1393. only a function, not as a subroutine, or do not support the (optional)
  1394. STATUS argument.
  1395.  
  1396.    For information on other intrinsics with the same name: *Note ChDir
  1397. Intrinsic (function)::.
  1398.  
  1399. 
  1400. File: g77.info,  Node: ChMod Intrinsic (subroutine),  Next: CLog Intrinsic,  Prev: ChDir Intrinsic (subroutine),  Up: Table of Intrinsic Functions
  1401.  
  1402. ChMod Intrinsic (subroutine)
  1403. ............................
  1404.  
  1405.      CALL ChMod(NAME, MODE, STATUS)
  1406.  
  1407. NAME: `CHARACTER'; scalar; INTENT(IN).
  1408.  
  1409. MODE: `CHARACTER'; scalar; INTENT(IN).
  1410.  
  1411. STATUS: `INTEGER(KIND=1)'; OPTIONAL; scalar; INTENT(OUT).
  1412.  
  1413. Intrinsic groups: `unix'.
  1414.  
  1415. Description:
  1416.  
  1417.    Changes the access mode of file NAME according to the specification
  1418. MODE, which is given in the format of `chmod(1)'.  A null character
  1419. (`CHAR(0)') marks the end of the name in NAME--otherwise, trailing
  1420. blanks in NAME are ignored.  Currently, NAME must not contain the
  1421. single quote character.
  1422.  
  1423.    If the STATUS argument is supplied, it contains 0 on success or a
  1424. non-zero error code upon return.
  1425.  
  1426.    Note that this currently works by actually invoking `/bin/chmod' (or
  1427. the `chmod' found when the library was configured) and so might fail in
  1428. some circumstances and will, anyway, be slow.
  1429.  
  1430.    Some non-GNU implementations of Fortran provide this intrinsic as
  1431. only a function, not as a subroutine, or do not support the (optional)
  1432. STATUS argument.
  1433.  
  1434.    For information on other intrinsics with the same name: *Note ChMod
  1435. Intrinsic (function)::.
  1436.  
  1437. 
  1438. File: g77.info,  Node: CLog Intrinsic,  Next: Cmplx Intrinsic,  Prev: ChMod Intrinsic (subroutine),  Up: Table of Intrinsic Functions
  1439.  
  1440. CLog Intrinsic
  1441. ..............
  1442.  
  1443.      CLog(X)
  1444.  
  1445. CLog: `COMPLEX(KIND=1)' function.
  1446.  
  1447. X: `COMPLEX(KIND=1)'; scalar; INTENT(IN).
  1448.  
  1449. Intrinsic groups: (standard FORTRAN 77).
  1450.  
  1451. Description:
  1452.  
  1453.    Archaic form of `LOG()' that is specific to one type for X.  *Note
  1454. Log Intrinsic::.
  1455.  
  1456. 
  1457. File: g77.info,  Node: Cmplx Intrinsic,  Next: Complex Intrinsic,  Prev: CLog Intrinsic,  Up: Table of Intrinsic Functions
  1458.  
  1459. Cmplx Intrinsic
  1460. ...............
  1461.  
  1462.      Cmplx(X, Y)
  1463.  
  1464. Cmplx: `COMPLEX(KIND=1)' function.
  1465.  
  1466. X: `INTEGER', `REAL', or `COMPLEX'; scalar; INTENT(IN).
  1467.  
  1468. Y: `INTEGER' or `REAL'; OPTIONAL (must be omitted if X is `COMPLEX');
  1469. scalar; INTENT(IN).
  1470.  
  1471. Intrinsic groups: (standard FORTRAN 77).
  1472.  
  1473. Description:
  1474.  
  1475.    If X is not type `COMPLEX', constructs a value of type
  1476. `COMPLEX(KIND=1)' from the real and imaginary values specified by X and
  1477. Y, respectively.  If Y is omitted, `0.' is assumed.
  1478.  
  1479.    If X is type `COMPLEX', converts it to type `COMPLEX(KIND=1)'.
  1480.  
  1481.    *Note Complex Intrinsic::, for information on easily constructing a
  1482. `COMPLEX' value of arbitrary precision from `REAL' arguments.
  1483.  
  1484. 
  1485. File: g77.info,  Node: Complex Intrinsic,  Next: Conjg Intrinsic,  Prev: Cmplx Intrinsic,  Up: Table of Intrinsic Functions
  1486.  
  1487. Complex Intrinsic
  1488. .................
  1489.  
  1490.      Complex(REAL, IMAG)
  1491.  
  1492. Complex: `COMPLEX' function, the exact type being the result of
  1493. cross-promoting the types of all the arguments.
  1494.  
  1495. REAL: `INTEGER' or `REAL'; scalar; INTENT(IN).
  1496.  
  1497. IMAG: `INTEGER' or `REAL'; scalar; INTENT(IN).
  1498.  
  1499. Intrinsic groups: `gnu'.
  1500.  
  1501. Description:
  1502.  
  1503.    Returns a `COMPLEX' value that has `Real' and `Imag' as its real and
  1504. imaginary parts, respectively.
  1505.  
  1506.    If REAL and IMAG are the same type, and that type is not `INTEGER',
  1507. no data conversion is performed, and the type of the resulting value
  1508. has the same kind value as the types of REAL and IMAG.
  1509.  
  1510.    If REAL and IMAG are not the same type, the usual type-promotion
  1511. rules are applied to both, converting either or both to the appropriate
  1512. `REAL' type.  The type of the resulting value has the same kind value
  1513. as the type to which both REAL and IMAG were converted, in this case.
  1514.  
  1515.    If REAL and IMAG are both `INTEGER', they are both converted to
  1516. `REAL(KIND=1)', and the result of the `COMPLEX()' invocation is type
  1517. `COMPLEX(KIND=1)'.
  1518.  
  1519.    *Note:* The way to do this in standard Fortran 90 is too hairy to
  1520. describe here, but it is important to note that `CMPLX(D1,D2)' returns
  1521. a `COMPLEX(KIND=1)' result even if `D1' and `D2' are type
  1522. `REAL(KIND=2)'.  Hence the availability of `COMPLEX()' in GNU Fortran.
  1523.  
  1524. 
  1525. File: g77.info,  Node: Conjg Intrinsic,  Next: Cos Intrinsic,  Prev: Complex Intrinsic,  Up: Table of Intrinsic Functions
  1526.  
  1527. Conjg Intrinsic
  1528. ...............
  1529.  
  1530.      Conjg(Z)
  1531.  
  1532. Conjg: `COMPLEX' function, the `KIND=' value of the type being that of
  1533. argument Z.
  1534.  
  1535. Z: `COMPLEX'; scalar; INTENT(IN).
  1536.  
  1537. Intrinsic groups: (standard FORTRAN 77).
  1538.  
  1539. Description:
  1540.  
  1541.    Returns the complex conjugate:
  1542.  
  1543.      COMPLEX(REALPART(Z), -IMAGPART(Z))
  1544.  
  1545. 
  1546. File: g77.info,  Node: Cos Intrinsic,  Next: CosH Intrinsic,  Prev: Conjg Intrinsic,  Up: Table of Intrinsic Functions
  1547.  
  1548. Cos Intrinsic
  1549. .............
  1550.  
  1551.      Cos(X)
  1552.  
  1553. Cos: `REAL' or `COMPLEX' function, the exact type being that of
  1554. argument X.
  1555.  
  1556. X: `REAL' or `COMPLEX'; scalar; INTENT(IN).
  1557.  
  1558. Intrinsic groups: (standard FORTRAN 77).
  1559.  
  1560. Description:
  1561.  
  1562.    Returns the cosine of X, an angle measured in radians.
  1563.  
  1564.    *Note ACos Intrinsic::, for the inverse of this function.
  1565.  
  1566. 
  1567. File: g77.info,  Node: CosH Intrinsic,  Next: Count Intrinsic,  Prev: Cos Intrinsic,  Up: Table of Intrinsic Functions
  1568.  
  1569. CosH Intrinsic
  1570. ..............
  1571.  
  1572.      CosH(X)
  1573.  
  1574. CosH: `REAL' function, the `KIND=' value of the type being that of
  1575. argument X.
  1576.  
  1577. X: `REAL'; scalar; INTENT(IN).
  1578.  
  1579. Intrinsic groups: (standard FORTRAN 77).
  1580.  
  1581. Description:
  1582.  
  1583.    Returns the hyperbolic cosine of X.
  1584.  
  1585. 
  1586. File: g77.info,  Node: Count Intrinsic,  Next: CPU_Time Intrinsic,  Prev: CosH Intrinsic,  Up: Table of Intrinsic Functions
  1587.  
  1588. Count Intrinsic
  1589. ...............
  1590.  
  1591.    This intrinsic is not yet implemented.  The name is, however,
  1592. reserved as an intrinsic.  Use `EXTERNAL Count' to use this name for an
  1593. external procedure.
  1594.  
  1595. 
  1596. File: g77.info,  Node: CPU_Time Intrinsic,  Next: CShift Intrinsic,  Prev: Count Intrinsic,  Up: Table of Intrinsic Functions
  1597.  
  1598. CPU_Time Intrinsic
  1599. ..................
  1600.  
  1601.      CALL CPU_Time(SECONDS)
  1602.  
  1603. SECONDS: `REAL'; scalar; INTENT(OUT).
  1604.  
  1605. Intrinsic groups: `f90'.
  1606.  
  1607. Description:
  1608.  
  1609.    Returns in SECONDS the current value of the system time.  This
  1610. implementation of the Fortran 95 intrinsic is just an alias for
  1611. `second' *Note Second Intrinsic (subroutine)::.
  1612.  
  1613.    On some systems, the underlying timings are represented using types
  1614. with sufficiently small limits that overflows (wraparounds) are
  1615. possible, such as 32-bit types.  Therefore, the values returned by this
  1616. intrinsic might be, or become, negative, or numerically less than
  1617. previous values, during a single run of the compiled program.
  1618.  
  1619. 
  1620. File: g77.info,  Node: CShift Intrinsic,  Next: CSin Intrinsic,  Prev: CPU_Time Intrinsic,  Up: Table of Intrinsic Functions
  1621.  
  1622. CShift Intrinsic
  1623. ................
  1624.  
  1625.    This intrinsic is not yet implemented.  The name is, however,
  1626. reserved as an intrinsic.  Use `EXTERNAL CShift' to use this name for an
  1627. external procedure.
  1628.  
  1629. 
  1630. File: g77.info,  Node: CSin Intrinsic,  Next: CSqRt Intrinsic,  Prev: CShift Intrinsic,  Up: Table of Intrinsic Functions
  1631.  
  1632. CSin Intrinsic
  1633. ..............
  1634.  
  1635.      CSin(X)
  1636.  
  1637. CSin: `COMPLEX(KIND=1)' function.
  1638.  
  1639. X: `COMPLEX(KIND=1)'; scalar; INTENT(IN).
  1640.  
  1641. Intrinsic groups: (standard FORTRAN 77).
  1642.  
  1643. Description:
  1644.  
  1645.    Archaic form of `SIN()' that is specific to one type for X.  *Note
  1646. Sin Intrinsic::.
  1647.  
  1648. 
  1649. File: g77.info,  Node: CSqRt Intrinsic,  Next: CTime Intrinsic (subroutine),  Prev: CSin Intrinsic,  Up: Table of Intrinsic Functions
  1650.  
  1651. CSqRt Intrinsic
  1652. ...............
  1653.  
  1654.      CSqRt(X)
  1655.  
  1656. CSqRt: `COMPLEX(KIND=1)' function.
  1657.  
  1658. X: `COMPLEX(KIND=1)'; scalar; INTENT(IN).
  1659.  
  1660. Intrinsic groups: (standard FORTRAN 77).
  1661.  
  1662. Description:
  1663.  
  1664.    Archaic form of `SQRT()' that is specific to one type for X.  *Note
  1665. SqRt Intrinsic::.
  1666.  
  1667. 
  1668. File: g77.info,  Node: CTime Intrinsic (subroutine),  Next: CTime Intrinsic (function),  Prev: CSqRt Intrinsic,  Up: Table of Intrinsic Functions
  1669.  
  1670. CTime Intrinsic (subroutine)
  1671. ............................
  1672.  
  1673.      CALL CTime(STIME, RESULT)
  1674.  
  1675. STIME: `INTEGER'; scalar; INTENT(IN).
  1676.  
  1677. RESULT: `CHARACTER'; scalar; INTENT(OUT).
  1678.  
  1679. Intrinsic groups: `unix'.
  1680.  
  1681. Description:
  1682.  
  1683.    Converts STIME, a system time value, such as returned by `TIME8()',
  1684. to a string of the form `Sat Aug 19 18:13:14 1995', and returns that
  1685. string in RESULT.
  1686.  
  1687.    *Note Time8 Intrinsic::.
  1688.  
  1689.    Some non-GNU implementations of Fortran provide this intrinsic as
  1690. only a function, not as a subroutine.
  1691.  
  1692.    For information on other intrinsics with the same name: *Note CTime
  1693. Intrinsic (function)::.
  1694.  
  1695. 
  1696. File: g77.info,  Node: CTime Intrinsic (function),  Next: DAbs Intrinsic,  Prev: CTime Intrinsic (subroutine),  Up: Table of Intrinsic Functions
  1697.  
  1698. CTime Intrinsic (function)
  1699. ..........................
  1700.  
  1701.      CTime(STIME)
  1702.  
  1703. CTime: `CHARACTER*(*)' function.
  1704.  
  1705. STIME: `INTEGER'; scalar; INTENT(IN).
  1706.  
  1707. Intrinsic groups: `unix'.
  1708.  
  1709. Description:
  1710.  
  1711.    Converts STIME, a system time value, such as returned by `TIME8()',
  1712. to a string of the form `Sat Aug 19 18:13:14 1995', and returns that
  1713. string as the function value.
  1714.  
  1715.    *Note Time8 Intrinsic::.
  1716.  
  1717.    For information on other intrinsics with the same name: *Note CTime
  1718. Intrinsic (subroutine)::.
  1719.  
  1720. 
  1721. File: g77.info,  Node: DAbs Intrinsic,  Next: DACos Intrinsic,  Prev: CTime Intrinsic (function),  Up: Table of Intrinsic Functions
  1722.  
  1723. DAbs Intrinsic
  1724. ..............
  1725.  
  1726.      DAbs(A)
  1727.  
  1728. DAbs: `REAL(KIND=2)' function.
  1729.  
  1730. A: `REAL(KIND=2)'; scalar; INTENT(IN).
  1731.  
  1732. Intrinsic groups: (standard FORTRAN 77).
  1733.  
  1734. Description:
  1735.  
  1736.    Archaic form of `ABS()' that is specific to one type for A.  *Note
  1737. Abs Intrinsic::.
  1738.  
  1739. 
  1740. File: g77.info,  Node: DACos Intrinsic,  Next: DASin Intrinsic,  Prev: DAbs Intrinsic,  Up: Table of Intrinsic Functions
  1741.  
  1742. DACos Intrinsic
  1743. ...............
  1744.  
  1745.      DACos(X)
  1746.  
  1747. DACos: `REAL(KIND=2)' function.
  1748.  
  1749. X: `REAL(KIND=2)'; scalar; INTENT(IN).
  1750.  
  1751. Intrinsic groups: (standard FORTRAN 77).
  1752.  
  1753. Description:
  1754.  
  1755.    Archaic form of `ACOS()' that is specific to one type for X.  *Note
  1756. ACos Intrinsic::.
  1757.  
  1758. 
  1759. File: g77.info,  Node: DASin Intrinsic,  Next: DATan Intrinsic,  Prev: DACos Intrinsic,  Up: Table of Intrinsic Functions
  1760.  
  1761. DASin Intrinsic
  1762. ...............
  1763.  
  1764.      DASin(X)
  1765.  
  1766. DASin: `REAL(KIND=2)' function.
  1767.  
  1768. X: `REAL(KIND=2)'; scalar; INTENT(IN).
  1769.  
  1770. Intrinsic groups: (standard FORTRAN 77).
  1771.  
  1772. Description:
  1773.  
  1774.    Archaic form of `ASIN()' that is specific to one type for X.  *Note
  1775. ASin Intrinsic::.
  1776.  
  1777. 
  1778. File: g77.info,  Node: DATan Intrinsic,  Next: DATan2 Intrinsic,  Prev: DASin Intrinsic,  Up: Table of Intrinsic Functions
  1779.  
  1780. DATan Intrinsic
  1781. ...............
  1782.  
  1783.      DATan(X)
  1784.  
  1785. DATan: `REAL(KIND=2)' function.
  1786.  
  1787. X: `REAL(KIND=2)'; scalar; INTENT(IN).
  1788.  
  1789. Intrinsic groups: (standard FORTRAN 77).
  1790.  
  1791. Description:
  1792.  
  1793.    Archaic form of `ATAN()' that is specific to one type for X.  *Note
  1794. ATan Intrinsic::.
  1795.  
  1796. 
  1797. File: g77.info,  Node: DATan2 Intrinsic,  Next: Date_and_Time Intrinsic,  Prev: DATan Intrinsic,  Up: Table of Intrinsic Functions
  1798.  
  1799. DATan2 Intrinsic
  1800. ................
  1801.  
  1802.      DATan2(Y, X)
  1803.  
  1804. DATan2: `REAL(KIND=2)' function.
  1805.  
  1806. Y: `REAL(KIND=2)'; scalar; INTENT(IN).
  1807.  
  1808. X: `REAL(KIND=2)'; scalar; INTENT(IN).
  1809.  
  1810. Intrinsic groups: (standard FORTRAN 77).
  1811.  
  1812. Description:
  1813.  
  1814.    Archaic form of `ATAN2()' that is specific to one type for Y and X.
  1815. *Note ATan2 Intrinsic::.
  1816.  
  1817.